From: Konrad Rzeszutek Wilk <konrad.wilk@oracle.com>
Date: Fri, 29 Apr 2016 06:38:33 +0000 (-0400)
Subject: ocaml/xc_get_cpu_featureset/arm: Return not implemented on ARM
X-Git-Tag: archive/raspbian/4.8.0-1+rpi1~1^2~1177
X-Git-Url: https://dgit.raspbian.org/%22http://www.example.com/cgi/%22/%22http:/www.example.com/cgi/%22?a=commitdiff_plain;h=397463f2bbb2b1bca235bfddde60aa6f1ffe6ab4;p=xen.git

ocaml/xc_get_cpu_featureset/arm: Return not implemented on ARM

... as it is not implemented on it.

Signed-off-by: Konrad Rzeszutek Wilk <konrad.wilk@oracle.com>
Reviewed-by: Andrew Cooper <andrew.cooper3@citrix.com>
Acked-by: Wei Liu <wei.liu2@citrix.com>
Release-acked-by: Wei Liu <wei.liu2@citrix.com>
---

diff --git a/tools/ocaml/libs/xc/xenctrl_stubs.c b/tools/ocaml/libs/xc/xenctrl_stubs.c
index 5477df391f..5e455519d4 100644
--- a/tools/ocaml/libs/xc/xenctrl_stubs.c
+++ b/tools/ocaml/libs/xc/xenctrl_stubs.c
@@ -1218,6 +1218,7 @@ CAMLprim value stub_xc_get_cpu_featureset(value xch, value idx)
 {
 	CAMLparam2(xch, idx);
 	CAMLlocal1(bitmap_val);
+#if defined(__i386__) || defined(__x86_64__)
 
 	/* Safe, because of the global ocaml lock. */
 	static uint32_t fs_len;
@@ -1245,7 +1246,9 @@ CAMLprim value stub_xc_get_cpu_featureset(value xch, value idx)
 		for (i = 0; i < len; ++i)
 			Store_field(bitmap_val, i, caml_copy_int64(fs[i]));
 	}
-
+#else
+	caml_failwith("xc_get_cpu_featureset: not implemented");
+#endif
 	CAMLreturn(bitmap_val);
 }